home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / programming / e / lsestuff / test_test.e < prev    next >
Text File  |  1999-11-29  |  141b  |  10 lines
  1. OPT PREPROCESS
  2. MODULE '*macros'
  3.  
  4. PROC main()
  5.    DEF a:REG, b[2]:ARRAY OF CHAR
  6.    FOR a := 0 TO 5000000
  7.       PUTCHAR(b, 9)
  8.    ENDFOR
  9. ENDPROC
  10.